10 CLS
20 i = 1	' Номер слагаемого
30 x = 5 / 8	' Первое слагаемого
40 s = 5 / 8	' Начальное значение суммы
50 znam = 8	' Начальное значение знаменателя
60 WHILE x > .001
70 pred = x
80 i = i + 1
90 znam = znam * 2 * (i + 1)	' Новый знаменатель
100 x = (i + 4) * i ^ 2 / znam	' Новое слагаемое
110 s = s + x
120 WEND
130 PRINT "Сумма ="; s - x
140 PRINT "Последнее слагаемое ="; pred
150 PRINT "Номер последнего слагаемого ="; i - 1
160 END